10 :REM================================
11 :REM                               "
12 :[143]    SPEICHER MONITOR           "
13 :REM                               "
14 :[143]================================
16 :
17 :
18 :
19 :[137]1000:[171][171][171][171]START PRG
20 :[148]"@0:_TANMONITOR 64",8:[142]:
21 :
22 :
120 CA[178]41960:[143]----BLOCK MOVE1(A,E,N)
122 H[178]256:B[178]E[171]A:C[178][181](B[173]H)[172]H:E[178]A[170]C:N[178]N[170]C:A%[178]E[173]H:[151]90,E[171]A%[172]H:[151]91,A%:A%[178]N[173]H
123 [151]88,N[171]A%[172]H:[151]89,A%:[151]781,C[173]H[170]1:[151]782,(B[171]C[170]1)[175]255:[158]CA[170]4:[142]
124 :
125 :A[178]41960:E[178]A[170]19:[141]120:[142]:[171][171][171]INST:
128 :
129 :
130 :[143]--- ZEICHEN-COPY(53248-57343):
131 :[151]56334,.:[151]1,51:[141]120:[151]1,55:[151]56334,1:[142]:
133 :
135 :
600 :[143]--- BLOCK-LOAD(A$,A)
601 :H[178]256:[158](57812)A$,8,0:[151]780,0:A%[178]A[173]H:[151]782,A%:[151]781,A[171]A%[172]H:
602 :[158]62622:[142]
604 :
605 :::[158]5781[177](A$),8,1:[151]780,0:[158]65493:[142]:[143]  AN STARTADRESSE LADEN
607 :
608 :
609 :
650 :[143]--- BLOCK-SAVE(A$,A,E)
651 :H[178]256:[158](57812)"@:"[170]A$,8:A%[178]A[173]H:[151]194,A%:[151]193,A[171]A%[172]H
652 :A%[178]E[173]H:[151]175,A%:[151]174,E[171]A%[172]H:[158]62957:[142]
654 :
655 :
810 :[143]---INST. RAM-SPRUNG USER     (ZUM LESEN DES RAM/PRG-AUFRUF)
811 :RS$[178]"LEFT$%WAITAEWAITBFRE)WAIT0EWAITANOT PC%WAITBEWAITA(null)CLOSE":
812 :A%[178]RS[173]256:[151]209,RS[171]A%[172]256:[151]210,A%:[151]211,.:[153]RS$:L[178][194](211):
813 :
814 :CO[178]48:[143]---VEKTOR & CONFIG(US,CO)
815 :[151]RS[170]7,CO:A%[178]US[173]256:[151]RS[170]12,US[171]A%[172]256:[151]RS[170]13,A%:[142]:
816 :
817 :
818 :
819 :
900 :[143]----ZEILN LOESCHEN
901 :[151]241,7:[151]19,1:[153]""[166]200)[166]200)[166]200)[166]200)[166]80);
902 :[151]213,40:[153][166]40)"";
905 :[151]19,.:[151]241,135:[142]:
996 :
997 :
998 :
999 :
1000 :[143]==============================
1001 :[143]
1002 :[143]     VORBEREITUNGEN
1003 :[143]
1004 :[143]==============================
1005 :
1006 :V0[178]824:[143]----INSTALL
1201 :N[178]V0:[141]125:
1202 :US[178]V0:RS[178]V0[170]20:[141]810:
1210 :CA[178]RS[171]4:CO[178]55:[141]815:
1215 :
1216 :
1220 :BS[178][194](648)[172]256:
1221 :BA[178]BS[170]2[172]40:BM[178]BS[170]1000[171]BA:
1225 :BL[178]1024:A1[178]0[172]BL
1226 :[150][165]P(A)[178][194](A)[170][194](A[170]1)[172]256
1227 :
1229 :
1230 :
1500 :[143]----ANZEIGE-TEXT
1510 :[153]"LOAD (null)(null)(null)RIGHT$(null)(null)(null) 64                             "
1511 :[153]"(null)ROGRAMM ZUM ATNNZEIGEN VON"
1512 :[153]"(null)PEICHERBEREICHEN IM LEN64"
1513 :
1514 :[153]"(null)OLLEN : MIT LENURSOR UND ASC5 BIS ASC8"
1515 :[153]"PEEKEREICH: (null)EIGT DEN ATNNZEIGEBEREICH"
1516 :[153]" ( LEFT$ ) : (null)EIGT EIN LEFT$ILFSMENUE"
1517 :
1550 :[153]"(WEITER)"
1551 :[151]214,23:[153]:[151]213,40:[153]"ASCREEWARE-VALDITION - STR$.PEEKREITINGER (2001)  "
1600 :[151]198,0:[146]198,1:[161]A$
1997 :
1998 :
1999 :
2000 :[143]==============================
2001 :[143]
2002 :[143]     HAUPTPROGRAMM
2003 :[143]
2004 :[143]==============================
2005 :
2006 :
2010 :A[178]6:[151]53280,A:[151]53281,A:[153]"LOAD"
2020 :L$[178]"LISTWAITFREFRELEFT$=LEFT$ILFEFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFREFRE"
2030 :
2050 :
2100 :A[178]A1:E[178]A[170]BM:
2105 :[151]19,1:[153]"(null)ONFIG:"CO;[163]19)"PEEKEREICH:"A"CMD"[163]33)[171]E"CMD"[163]40)L$
2106 :[151]19,.
2120 :A[178]A1:E[178]A[170]BM:N[178]BA:[141]122:::[161]A$:[139]A$[178]""[137]2120
2201 :
2210 :[139]A$[178]"READ"[176]A$[178]"LET"[167]:A1[178][181](A1[173]BM)[172]BM[170]BM[172](1[170]2[172](A$[178]"READ")):[137]2260
2211 :[139]A$[178]"IF"[176]A$[178]"RESTORE"[167]:A1[178][181](A1[173]BM)[172]BM[170]BM[172](1[170]2[172](A$[178]"IF")):[137]2260
2215 :[139]A$[178]""[176]A$[178]"ON"[167]:A1[178]A1[170]40[172](1[170]2[172](A$[178]"ON")):[137]2260:
2216 :[139]A$[178]""[176]A$[178]"CMD"[167]:A1[178]A1[170]1[170]2[172](A$[178]"CMD"):[137]2260:
2220 :
2225 :
2226 :
2227 :
2231 :[139]A$[178]"INPUT"[176]A$[178]""[167]:A1[178]0:[137]2100
2232 :[139]A$[178]"DIM"[167]:A1[178]16[172]BL:[137]2100
2233 :[139]A$[178]"GOTO"[167]:A1[178]32[172]BL:[137]2100
2234 :[139]A$[178]"RUN"[167]:A1[178]48[172]BL:[137]2100
2235 :
2236 :[139]A$[178]"1"[167]:CO[178]55:[141]815:
2237 :[139]A$[178]"2"[167]:CO[178]51:[141]815:
2238 :[139]A$[178]"3"[167]:CO[178]48:[141]815
2240 :[139]A$[178]"H"[176]A$[178][199](13)[176]A$[178]" "[167]:[141]2500
2250 :[145][171](A$[178]"\")[141]20:[151]198,0:[137]2100:
2251 :
2252 :
2253 :
2260 :[143]---- WERTE KOREKTUR
2261 :[139](A1[177][178]65535[171]BM)[167]:A1[178]65535[171]BM
2262 :A1[178]A1[172][171](A1[177].):[137]2100
2263 :
2264 :
2265 :
2500 :[143]---- HILFE:
2501 :
2504 :A(.)[178].:A(1)[178]BS:A(2)[178][165]P(43)[171]1:A(3)[178][165]P(643)[171]BM
2505 :A(4)[178]40960:A(5)[178]49152:A(6)[178]53248:A(7)[178]57344
2510 :[153]"";:[141]900:[153]"  (null)PRUENGE WAIT"[163]120);
2511 :[153]" ( 1 )  (null)PRUNG  (null)EROPAGE       (    0)  ";
2512 :[153]" ( 2 )          PEEKILDSCHIRM     ( 1024)  ";
2513 :[153]" ( 3 )          PEEKASIC-ATNNFANG   ( 2048)  ";
2514 :[153]" ( 4 )          PEEKASIC-VALNDE     (40040)  ";
2515 :[153]" ( 5 )          (null)OM-PEEKASIC      (40960)  ";
2516 :[153]" ( 6 )          OBERES (null)AM     (49152)  ";
2517 :[153]" ( 7 )          RIGHT$/(null)-(null)AM/LENHAR   (53248)  ";
2518 :[153]" ( 8 )          (null)OM-(null)ERNAL     (57344)  ";
2519 :
2530 :[153]"  RIGHT$M (null)ONITOR"
2531 :[153]"ON (LEN(null)(null)(null))   (null)OR UND (null)URUECK (null)OLLEN"
2532 :[153]" (ASC5-ASC7)  PEEKLAETTERN "
2533 :[153]" (1-3)  (null)ONFIGURATION EINSTELLEN"
2534 :[153]" 55=(null)ORMAL: 51=(null)OM+LENHAR: 48=(null)UR (null)AM ";
2550 :[146]198,1:[161]A$:
2551 :[139]A$[177]"0"[175]A$[179]"9"[167]:A1[178]A([197](A$)[171]1):CO[178]55:[141]815:[142]:
2560 :[142]:
9999 :::::PRG SCHLUSS:::::